home *** CD-ROM | disk | FTP | other *** search
/ Internet Pratica / IPRAT_01.iso / ASP / ASPapp Portal / goto.asp < prev    next >
Encoding:
Text File  |  2002-03-12  |  308 b   |  24 lines
  1. <%
  2. %>
  3. <% response.redirect request("gotourl") %>
  4. <%
  5.  
  6.  
  7.  
  8.  
  9.  
  10. do_search = request("do_search")
  11. ''' request form keys
  12. ''' request action
  13. action = lcase(request("action"))
  14. ''' action case handler
  15. select case action
  16.  
  17. end select
  18.  
  19. '  no action was specified, so handle the default case(s)
  20.  
  21. %>
  22.  
  23.  
  24.